home *** CD-ROM | disk | FTP | other *** search
/ Tricks of the Mac Game Programming Gurus / TricksOfTheMacGameProgrammingGurus.iso / More Source / C⁄C++ / Xconq 7.0d37 / lib / ring-quest.g < prev    next >
Text File  |  1995-05-04  |  1KB  |  80 lines
  1. (game-module "ring-quest"
  2.   (title "")
  3.   (blurb "")
  4.   (variants 
  5.     (see-all false)
  6.     (world-seen true)
  7.   )
  8. )
  9.  
  10. (include "u-midearth")
  11.  
  12. ;; Constrain construction.
  13.  
  14. (table tp-to-build
  15.   (u* hobbit 1)
  16.   (u* dwarf 1)
  17.   (u* elf 1)
  18.   )
  19.  
  20. (side 2 (trusts 4 1))
  21.  
  22. (side 4 (name "Gondor") (adjective "Gondorian") (class "good")
  23.   (emblem-name "tree-and-crown"))
  24.  
  25. (side 4 (trusts (2 1)))
  26.  
  27. (side 5 (name "Isengard") (adjective "Isengardian") (class "evil")
  28.   )
  29.  
  30. (side 5 (trusts (1 1)))
  31.  
  32. (unit-defaults (s 2))
  33.  
  34. (hobbit 24 51 (n "Frodo"))
  35. (hobbit 24 51 (n "Sam"))
  36. (hobbit 24 51 (n "Pippin"))
  37. (hobbit 24 51 (n "Merry"))
  38.  
  39. (wizard 24 50 (n "Gandalf"))
  40.  
  41. (unit "Brandy Hall")
  42.  
  43. (unit "Hobbiton")
  44.  
  45. (the-ring (in "Frodo"))
  46.  
  47. (unit-defaults (s 4))
  48.  
  49. (unit "Calembel")
  50. (unit "Dol Amroth")
  51. (unit "Lamedon")
  52. (unit "Langstrand")
  53. (unit "Linhir")
  54. (unit "Minas Tirith")
  55. (unit "Morthond")
  56. (unit "Pelargir")
  57.  
  58. (unit-defaults (s 5))
  59.  
  60. (unit "Isengard")
  61.  
  62. (wizard (n "Saruman") (in "Isengard"))
  63. (unit-defaults (s 1))
  64.  
  65. ;; 9 nazgul
  66.  
  67. (nazgul)
  68. (nazgul)
  69. (nazgul)
  70. (nazgul)
  71. (nazgul)
  72. (nazgul)
  73. (nazgul)
  74. (nazgul)
  75. (nazgul)
  76.  
  77. (unit "Minas Morgul")
  78. (unit "Durthang")
  79. (unit "Orodruin")
  80.